inherited dlgKassaFunction: TdlgKassaFunction
  Left = 542
  Top = 370
  VertScrollBar.Range = 0
  AutoSize = True
  BorderStyle = bsDialog
  Caption = #1060#1091#1085#1082#1094#1080#1080' '#1082#1072#1089#1089#1099
  ClientHeight = 244
  ClientWidth = 358
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 211
    Width = 358
    Height = 33
    inherited BitBtn1: TBitBtn
      Left = 158
      Top = 4
      Visible = False
    end
    inherited BitBtn2: TBitBtn
      Left = 260
      Top = 4
      ModalResult = 2
    end
  end
  inherited ToolBar1: TToolBar
    Width = 358
    Height = 0
    Enabled = False
    Visible = False
    inherited ToolButton1: TToolButton
      Enabled = False
    end
    inherited ToolButton2: TToolButton
      Enabled = False
    end
    inherited ToolButton3: TToolButton
      Enabled = False
    end
    inherited ToolButton4: TToolButton
      Enabled = False
    end
  end
  object Panel2: TPanel [2]
    Left = 0
    Top = 0
    Width = 358
    Height = 211
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 2
    object lKKM_SerialHeader: TLabel
      Left = 2
      Top = 192
      Width = 98
      Height = 13
      Caption = #1047#1072#1074#1086#1076#1089#1082#1086#1081' '#8470' '#1050#1050#1052':'
    end
    object GroupBox1: TGroupBox
      Left = 0
      Top = 106
      Width = 358
      Height = 53
      Align = alTop
      TabOrder = 0
      object btCancelCheck: TSpeedButton
        Left = 12
        Top = 16
        Width = 109
        Height = 25
        Caption = #1054#1090#1084#1077#1085#1080#1090#1100' '#1095#1077#1082
        Flat = True
        OnClick = btCancelCheckClick
      end
      object btContinuePrint: TSpeedButton
        Left = 124
        Top = 16
        Width = 109
        Height = 25
        Caption = #1055#1088#1086#1076#1086#1083#1078#1080#1090#1100' '#1087#1077#1095#1072#1090#1100
        Flat = True
        OnClick = btContinuePrintClick
      end
      object btTestCheck: TSpeedButton
        Left = 236
        Top = 16
        Width = 109
        Height = 25
        Caption = #1055#1088#1086#1074#1077#1088#1082#1072' '#1087#1077#1095#1072#1090#1080
        Flat = True
        OnClick = btTestCheckClick
      end
    end
    object GroupBox2: TGroupBox
      Left = 0
      Top = 0
      Width = 358
      Height = 53
      Align = alTop
      TabOrder = 1
      object btOpenSession: TSpeedButton
        Left = 12
        Top = 16
        Width = 109
        Height = 25
        Caption = #1054#1090#1082#1088#1099#1090#1100' '#1089#1084#1077#1085#1091
        Flat = True
        OnClick = btOpenSessionClick
      end
      object btXReport: TSpeedButton
        Left = 124
        Top = 16
        Width = 109
        Height = 25
        Caption = #1061' '#1086#1090#1095#1077#1090
        Flat = True
        OnClick = btXReportClick
      end
      object btCloseSession: TSpeedButton
        Left = 236
        Top = 16
        Width = 109
        Height = 25
        Caption = #1047#1072#1082#1088#1099#1090#1100' '#1089#1084#1077#1085#1091
        Flat = True
        OnClick = btCloseSessionClick
      end
    end
    object GroupBox3: TGroupBox
      Left = 0
      Top = 53
      Width = 358
      Height = 53
      Align = alTop
      TabOrder = 2
      object btRepeatDocument: TSpeedButton
        Left = 12
        Top = 16
        Width = 109
        Height = 25
        Caption = #1055#1086#1074#1090#1086#1088' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
        Flat = True
        OnClick = btRepeatDocumentClick
      end
      object btReturnSale: TSpeedButton
        Left = 124
        Top = 16
        Width = 109
        Height = 25
        Caption = #1042#1086#1079#1074#1088#1072#1090
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        OnClick = btReturnSaleClick
      end
    end
    object chPrintCheckFromPPP: TCheckBox
      Left = 2
      Top = 164
      Width = 237
      Height = 17
      Hint = 
        #1055#1077#1095#1072#1090#1072#1090#1100' '#1085#1072' '#1082#1072#1089#1089#1077' '#1095#1077#1082#1080' '#1087#1083#1072#1090#1077#1078#1077#1081' '#1080#1079' '#1092#1072#1081#1083#1086#1074', '#1089#1086#1079#1076#1072#1074#1072#1077#1084#1099#1093' '#13#10#1087#1088#1086#1075#1088#1072#1084 +
        #1084#1086#1081' "'#1057#1052'-'#1050#1072#1089#1089#1080#1088'"('#1090#1084') '#1087#1088#1080' '#1086#1090#1087#1088#1072#1074#1082#1077' '#1087#1088#1080#1085#1103#1090#1099#1093' '#1087#1083#1072#1090#1077#1078#1077#1081'.'
      Caption = #1055#1077#1095#1072#1090#1072#1090#1100' '#1085#1072' '#1082#1072#1089#1089#1077' '#1095#1077#1082#1080' '#1076#1083#1103' "'#1057#1052'-'#1050#1072#1089#1089#1080#1088'"'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      Visible = False
    end
    object lKKM_Serial: TDBEditEh
      Left = 106
      Top = 190
      Width = 121
      Height = 19
      AlwaysShowBorder = True
      Color = clInactiveCaptionText
      EditButtons = <>
      Flat = True
      ReadOnly = True
      TabOrder = 4
      Visible = True
    end
  end
  inherited ActionList1: TActionList
    Left = 316
    Top = 68
    inherited aCancel: TAction
      SecondaryShortCuts.Strings = (
        'Esc')
      OnExecute = aCancelExecute
    end
  end
  inherited PropStorage: TPropStorageEh
    Section = 'dlgKassaFunction'
  end
  object LocalTrans: TpFIBTransaction
    DefaultDatabase = MAINDM.pMainDatabase
    TimeoutAction = TARollback
    Left = 284
    Top = 68
  end
  object QReturnReceipt: TpFIBQuery
    Transaction = LocalTrans
    Database = MAINDM.pMainDatabase
    SQL.Strings = (
      'EXECUTE PROCEDURE PROC_CASHIER_REPAY(:PRECIEPT,'
      '    :PKKM_SERAIL)')
    Left = 254
    Top = 68
    qoStartTransaction = True
  end
  object QAbonParams: TpFIBDataSet
    SelectSQL.Strings = (
      'select v.name, v.g_licschet, v.address,'
      '       sum(r.summa)'
      '  from reciepts r, v_abons v'
      '  where r.reciept = :PRECIEPT'
      '    and r.abonent_id = v.id'
      '  group by 1,2,3')
    Transaction = LocalTrans
    Database = MAINDM.pMainDatabase
    Left = 236
    Top = 72
  end
end
